home *** CD-ROM | disk | FTP | other *** search
/ Dos/V Magazine 1995 October 15 / CD [VMAG951015].bin / _demo / gambo / title.dxr / 00008.ls < prev    next >
Encoding:
Text File  |  1995-02-13  |  555 b   |  32 lines
  1. on startMovie
  2.   set the volume of sound 1 to 250
  3.   cursor(4)
  4.   set the mouseDownScript to "mClick"
  5. end
  6.  
  7. on mclick
  8.   sound fadeOut 1, 30
  9.   go("Fade")
  10. end
  11.  
  12. on mselectmovie
  13.   global movieselect
  14.   if movieselect = 0 then
  15.     set movieselect to 1
  16.     go(45, "Yasai.dxr")
  17.   else
  18.     if movieselect = 1 then
  19.       set movieselect to 2
  20.       go(2, "Closet.dxr")
  21.     else
  22.       if movieselect = 2 then
  23.         set movieselect to 3
  24.         go(1, "Danro.dxr")
  25.       else
  26.         set movieselect to 0
  27.         go(1, "K_Rdoor.dxr")
  28.       end if
  29.     end if
  30.   end if
  31. end
  32.